Chip 2004 December/2004-12 CHIP.iso/Internet/The Bat! Professional 3.01/thebat_professional.msi/Data1.cab/thebat.exe/0/RCDATA/TTIMEFRAMER/TTIMEFRAMER.txt

Text File | 2004-10-12 | 10KB | 453 lines

object TimeFramer: TTimeFramer
  Left = 0
  Top = 0
  Width = 419
  Height = 261
  TabOrder = 0
  object Book: TPageControl
    Left = 0
    Top = 0
    Width = 419
    Height = 261
    ActivePage = tsDays
    Align = alClient
    Style = tsFlatButtons
    TabOrder = 0
    object tsTime: TTabSheet
      Caption = 'Time'
      ImageIndex = 4
      object lbMaskHours: TLabel
        Left = 40
        Top = 156
        Width = 31
        Height = 13
        Caption = 'Hours:'
        FocusControl = eMaskHours
      end
      object lbMaskMin: TLabel
        Left = 40
        Top = 180
        Width = 40
        Height = 13
        Caption = 'Minutes:'
        FocusControl = eMaskMin
      end
      object lbMaskSec: TLabel
        Left = 40
        Top = 204
        Width = 45
        Height = 13
        Caption = 'Seconds:'
        FocusControl = eMaskSec
      end
      object lbTimeFrom: TLabel
        Left = 40
        Top = 92
        Width = 23
        Height = 13
        Caption = 'From'
      end
      object lbTimeTo: TLabel
        Left = 200
        Top = 92
        Width = 9
        Height = 13
        Caption = 'to'
      end
      object rbRepeatTime: TRadioButton
        Left = 16
        Top = 40
        Width = 313
        Height = 17
        Caption = 'Repeat every'
        TabOrder = 0
        OnClick = rbTimeTimeClick
      end
      object eRepeatTime: TXSpinEdit
        Left = 40
        Top = 60
        Width = 97
        Height = 21
        TabOrder = 1
        Text = '1'
        MinValue = 1
        MaxValue = 86400
        Value = 1
        Step = 1
      end
      object cbRepeatTime: TComboBox
        Left = 144
        Top = 60
        Width = 145
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        ItemIndex = 2
        TabOrder = 2
        Text = 'hours'
        Items.Strings = (
          'seconds'
          'minutes'
          'hours')
      end
      object rbTimeTime: TRadioButton
        Left = 16
        Top = 8
        Width = 129
        Height = 17
        Caption = 'Event starts at'
        Checked = True
        TabOrder = 3
        TabStop = True
        OnClick = rbTimeTimeClick
      end
      object dtTime: TDateTimePicker
        Left = 144
        Top = 8
        Width = 145
        Height = 21
        Date = 37495.489549803200000000
        Time = 37495.489549803200000000
        Kind = dtkTime
        TabOrder = 4
      end
      object rbTimeMask: TRadioButton
        Left = 16
        Top = 128
        Width = 377
        Height = 17
        Caption = 'Use this Time Mask (Cron format):'
        TabOrder = 5
        OnClick = rbTimeTimeClick
      end
      object eMaskHours: TEdit
        Left = 144
        Top = 152
        Width = 257
        Height = 21
        TabOrder = 6
        Text = '*'
      end
      object eMaskMin: TEdit
        Left = 144
        Top = 176
        Width = 257
        Height = 21
        TabOrder = 7
        Text = '0'
      end
      object eMaskSec: TEdit
        Left = 144
        Top = 200
        Width = 257
        Height = 21
        TabOrder = 8
        Text = '0'
      end
      object dtTimeFrom: TDateTimePicker
        Left = 96
        Top = 88
        Width = 97
        Height = 21
        Date = 37495.817291099500000000
        Time = 37495.817291099500000000
        Kind = dtkTime
        TabOrder = 9
      end
      object dtTimeTo: TDateTimePicker
        Left = 232
        Top = 88
        Width = 97
        Height = 21
        Date = 37495.817291099500000000
        Time = 37495.817291099500000000
        Kind = dtkTime
        TabOrder = 10
      end
    end
    object tsHours: TTabSheet
      Caption = 'Hours'
      object lbHourFrom: TLabel
        Left = 40
        Top = 100
        Width = 23
        Height = 13
        Caption = 'From'
      end
      object lbHourTo: TLabel
        Left = 200
        Top = 100
        Width = 9
        Height = 13
        Caption = 'to'
      end
      object cbAllHours: TRadioButton
        Left = 8
        Top = 8
        Width = 385
        Height = 17
        Caption = 'All day long'
        Checked = True
        TabOrder = 0
        TabStop = True
        OnClick = cbAllHoursClick
      end
      object cbWHours: TRadioButton
        Left = 8
        Top = 32
        Width = 393
        Height = 17
        Caption = 'Within working hours'
        TabOrder = 1
        OnClick = cbAllHoursClick
      end
      object cbNWHours: TRadioButton
        Left = 8
        Top = 56
        Width = 385
        Height = 17
        Caption = 'Within non-working hour'
        TabOrder = 2
        OnClick = cbAllHoursClick
      end
      object cbHourInterval: TRadioButton
        Left = 8
        Top = 80
        Width = 385
        Height = 17
        Caption = 'Within time interval:'
        TabOrder = 3
        OnClick = cbAllHoursClick
      end
      object cbHourList: TRadioButton
        Left = 8
        Top = 128
        Width = 385
        Height = 17
        Caption = 'Hour list:'
        TabOrder = 4
        OnClick = cbAllHoursClick
      end
      object eHourList: TEdit
        Left = 32
        Top = 152
        Width = 361
        Height = 21
        TabOrder = 5
      end
      object dtHourFrom: TDateTimePicker
        Left = 96
        Top = 96
        Width = 97
        Height = 21
        Date = 37495.817291099500000000
        Time = 37495.817291099500000000
        Kind = dtkTime
        TabOrder = 6
      end
      object dtHourTo: TDateTimePicker
        Left = 232
        Top = 96
        Width = 97
        Height = 21
        Date = 37495.817291099500000000
        Time = 37495.817291099500000000
        Kind = dtkTime
        TabOrder = 7
      end
    end
    object tsDays: TTabSheet
      Caption = 'Days'
      ImageIndex = 1
      object cbAllDays: TRadioButton
        Left = 8
        Top = 8
        Width = 385
        Height = 17
        Caption = 'Every day'
        Checked = True
        TabOrder = 0
        TabStop = True
        OnClick = cbAllDaysClick
      end
      object cbWDays: TRadioButton
        Left = 8
        Top = 32
        Width = 385
        Height = 17
        Caption = 'Every working day'
        TabOrder = 1
        OnClick = cbAllDaysClick
      end
      object cbNWDays: TRadioButton
        Left = 8
        Top = 56
        Width = 385
        Height = 17
        Caption = 'Every non-working day'
        TabOrder = 2
        OnClick = cbAllDaysClick
      end
      object cbWeekDays: TRadioButton
        Left = 8
        Top = 80
        Width = 385
        Height = 17
        Caption = 'Week days:'
        TabOrder = 3
        OnClick = cbAllDaysClick
      end
      object clbWeekDays: TCheckListBox
        Left = 24
        Top = 104
        Width = 369
        Height = 60
        Columns = 2
        ItemHeight = 13
        Items.Strings = (
          'Monday'
          'Tuesday'
          'Wednesday'
          'Thursday'
          'Friday'
          'Saturday'
          'Sunday')
        TabOrder = 4
      end
      object cbDayList: TRadioButton
        Left = 8
        Top = 176
        Width = 121
        Height = 17
        Caption = 'Day list:'
        TabOrder = 5
        OnClick = cbAllDaysClick
      end
      object eDayList: TEdit
        Left = 24
        Top = 200
        Width = 369
        Height = 21
        TabOrder = 6
      end
      object cbDLType: TComboBox
        Left = 136
        Top = 174
        Width = 145
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        ItemIndex = 0
        TabOrder = 7
        Text = 'Month days'
        Items.Strings = (
          'Month days'
          'Year days'
          'vCalendar/iCalendar')
      end
    end
    object tsWeeks: TTabSheet
      Caption = 'Weeks'
      ImageIndex = 2
      object cbAllWeeks: TRadioButton
        Left = 8
        Top = 8
        Width = 313
        Height = 17
        Caption = 'Every week'
        Checked = True
        TabOrder = 0
        TabStop = True
        OnClick = cbAllWeeksClick
      end
      object cbSpecWeeks: TRadioButton
        Left = 8
        Top = 32
        Width = 337
        Height = 17
        Caption = 'Specific weeks of a month:'
        TabOrder = 1
        OnClick = cbAllWeeksClick
      end
      object clbWeeks: TCheckListBox
        Left = 32
        Top = 56
        Width = 353
        Height = 57
        Columns = 2
        ItemHeight = 13
        Items.Strings = (
          'First'
          'Second'
          'Third'
          'Fourth'
          'Last'
          'Preceding to last')
        TabOrder = 2
      end
      object cbWeekList: TRadioButton
        Left = 8
        Top = 120
        Width = 169
        Height = 17
        Caption = 'List of weeks of a year:'
        TabOrder = 3
        OnClick = cbAllWeeksClick
      end
      object eWeekList: TEdit
        Left = 32
        Top = 144
        Width = 353
        Height = 21
        TabOrder = 4
      end
    end
    object tsMonths: TTabSheet
      Caption = 'Months'
      ImageIndex = 3
      object cbAllMonths: TRadioButton
        Left = 8
        Top = 8
        Width = 281
        Height = 17
        Caption = 'Every month'
        Checked = True
        TabOrder = 0
        TabStop = True
        OnClick = cbAllMonthsClick
      end
      object cbSpecMonths: TRadioButton
        Left = 8
        Top = 32
        Width = 353
        Height = 17
        Caption = 'Specific months:'
        TabOrder = 1
        OnClick = cbAllMonthsClick
      end
      object clbMonths: TCheckListBox
        Left = 32
        Top = 56
        Width = 361
        Height = 90
        Columns = 2
        ItemHeight = 13
        Items.Strings = (
          'January'
          'February'
          'March'
          'April'
          'May'
          'June'
          'July'
          'August'
          'September'
          'October'
          'November'
          'December')
        TabOrder = 2
      end
    end
  end
end